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A table of powers of 2 
Each power is given by the first 16 
Significant digits and the power of 
10 to locate the true decimal point. 


For example, the 1000th power of 2 
is an integer of 302 digits. 


4000 1. 3182040934 30943 1204 
4200 2.118272307832115 1264 
4500 4 .314996898727097 = 1354 
4800 8.78980 3920478832 1444 
5000 1.4124670 32139426 1505 
5500 4 623556 316968135 1655 
gOoo 1.861919823602447 2709 
10000 1.995063116880758 3010 
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1.41421356237 309504880 16887 2420969807 856967 187537694807 31766797 
379907 324784621070 38850 387 5 34 32764157 27 3501 38462 3091229702492 
48360558507 372126441214970999 358 3141 3222665927 5055927 55799950 
50115278206057 147010955997 16059702745 345968620147 285174186408 
89198609552 3292 30484 3087 14 3214508 3976260 362799525140798968725 
3396546 3318088296400206 15258 3523950547457 50287 7599617298 35575 
220 337531857011 354 37460 3408498847 160 3868999706990048150 305440 
277903164 5424782 30684929 369 186215805784 31115966687 1301301561 
8568987 237 2352885092648612494977 154218 33420428568606014682472 
07714 3585487415565706967 765 37 202264854470158588016207584 74922 
657226002085584466521458 39889 3944 370926591800 311 3882464681570 
826 3010059485870400 3186480 34219489727 829064104507 26 36881 31373 
9855256117 322040245091227 700226941127 57 3627 2804957 38108967 504 
018369868 3684507257 99 3647 2906076299694 1 38047 565482 37289971803 
2680247 442062926912485905218100445984215059112024944 1 34172853 
147810580 3603371077 309182869 3147 101711116839165817268894 19758 
71658215212822951848847... 


Shown above are the first 1000 significant digits 
of the square root of 2. 

The square of this 1000-digit number is a 2000-digit 
number having the form 1.(998 nines)... 

If the 1000th digit is changed from 7 to 8, then the 
square will have the form 2.(998 zeros)..., thus proving 
the result. ; 


The square root of 2 is known to one million decimal 


places. The only other irrational number known to that 
level of precision is pi. 
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Apple Il 


The Apple II personal computer has been marketed 
for nearly two years as one of the top-of-the-line machines. 
The processor and all needed circuitry is contained in a 
Plastic case (15 x 18 x 5 inches) including a 52-key 
typewriter-like keyboard. To make a complete system, the 
user adds a cassette player and a TV monitor. The Apple 
features color control of the TV screen, and color demon- 
stration routines are included with each machine that are 
spectacular. RAM storage is available in 16K-byte 
increments from 16K to 48K (it is possible to buy an Apple 
With only 4K of RAM, but few people would). Integer BASIC 
is standard in ROM. Floating point BASIC ("Applesoft") 
can be obtained in ROM, or is furnished on cassette. The 
company advertises "6502 assembly language" as standard. 
A monitor that is quite powerful is built into a ROM. 
Facilities for expansion (to dual floppies, for example) 
are available. 


Much of the software that is supplied with the machine 
comes with little or no documentation. The machine 
reference manual (the red manual) is a monumental glitch 
from cover to cover, featuring up to half a dozen typos 
per page, and evidently written by a 12-year-old. It has 
no index. 


The phrase "symbolic assembler" is so common that one 
tends to forget that there can be an assembler that is not 
symbolic. But that is what Apple offers in its firmware; 
a bare-bones minimal assembly program and a disassembler. 
It's clever, neat, and inexpensive, but it's miles from 
what one expects for an assembler. If you want to use 
the speed and power of the 6502 processor, be prepared to 
work at the bit level. 


It is fairly easy to get to the 6502 level in the 
Apple, and the processor operates in the machine at the 
rate of 250,000 executed instructions per second. 


The two BASIC interpreters that come with the Apple 
are magnificently incompatible, almost to the point where 
it seems to have been done deliberately. For example, one 
of them has the MOD function, while the other one doesn't. 
Neither of them has any kind of usable STOP command. Even 
the horizontal and vertical spacings on the screen are 


radically different. The point is that Apple had the 
opportunity to do these things right; they bought the floating 
version from Microsoft and could have insisted that it be .) 


made compatible wherever possible. 
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Now, one must agree with Emerson's belief that 
"A foolish consistency is the hobgoblin of little minds." 
But Emerson wrote no essays on intelligent consistency, nor 
on a passion for inconsistency for its own sake. Consider, 
for example, the RND function. In integer BASIC, this 
function produces integers in the range from O to 32767; 
in the floating point system, it produces fractions, X, 
in the range 0<X<1. So far so good--that's what you'd 
want it to do. But the integer RND is not a random number 
enerator at all; it scrambles the numbers from O to 32767 
that is, each of those numbers appears once and only once 
in each generation cycle). Thus, it generates random 
permutations, and with an extremely short cycle. 


The floating point BASIC is full of odd little quirks. 
For example, the (perfectly legal) statement: 


100 IF X< A THEN 200 
lists (and refuses to execute) as: 
100 IF X< AT HEN20O 


(but any letter but A in the statement works properly). 


The complete assembly language listing of the monitor 
is supplied, but it is poorly documented. To find out 
such fundamental things as how to implement carriage return 
and line feed (those are quaint terms to apply to a CRT), 
One asks a friend. It's in that monitor, but you'll 
never find it out by yourself. 


To be sure, the Apple users form a close-knit group 
(this is true of users of TRS-80s, Porsche's, and various 
brands of surfboards, too), but it is disconcerting to hear 
a casual remark like "Did you know that while you're in 
the mini-assembler (!) mode, that ($) lets you use all of 
the (*) monitor features?" That information (which is 
quite useful if you have an Apple) can be found buried in 
the documentation, but it should be clearly brought out 
in a reference manual. 


But there isn't a reference manual. There is an 
updated version of the old (blue) manual, and a manual for 
Applesoft that parallels its style and format. These 
manuals are well-written textbooks for beginners; they are 
not reference manuals. For instance, while working out 
the bugs of a new program, one might want to look up the 
use and effects of the DIM (Dimension) command. The 
manual's index gives: 


DIM 88-90, 94-97, 116, 117 
Here's another example: 
Pound sign 57, 61, 100, 106-107, 117, 120, 125 


(This symbol, which is quite useful, exists in integer BASIC, 
but not in the floating point version.) 


It has been widely noted that the designer of the 
keyboard contributed an outstanding goof to the Apple by 
mounting the RESET button next to RETURN, thus making it 
quite easy to hit RESET inadvertently. There have been 
suggestions (such as in the February 1979 Dr. Dobb's Journal) 
on how to remount the RESET button in a more remote position, 
which must leave your machine looking like hell. 


Despite these deficiencies, most of which are easily 
corrected, the Apple still rates high and is surely a 
powerful and top-quality machine. 


We have taken the Apple people to task in this 
article for their sins, which are largely of omission. In 
all probability, the list of goofs, weaknesses, and other 
deficiencies for the competitive machines would be longer. 
We should add the comments of a satisfied user: 


"Apple tries. Although some of their software 

and hardware goes out the door before it's fully 

"road tested," the users are eventually given the 
correct solutions to any problems. The Apple II BASIC 
Programming Manual is a neat, colorful, and usefu 

text for the BASIC novice. If this document hints 
of products to come, then Hooray Apple! Apple could 
have. chosen a Keyboard requiring pin-point precision 
typing, but instead chose a "normal-sized" keyboard 
with a light touch conducive to the many hours of 
late-night work the average Apple user endures." 
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Radio Shack’s 
TRS -80 


by Larry Clark 


Since Radio Shack introduced the TRS-80 last Spring, 
they have sold over 100,000 units. Although much of this 
success can be attributed to aggressive advertising and to 
control of 7000 captive retail outlets, there are also solid 
technical reasons behind the TRS-80's popularity. 


I acquired my TRS-80 about seven months ago. Since 
then, I have expanded the configuration until it is now 
fairly complete. Although I am pleased with the system as 
a whole, it is not without its disappointments. This 
report describes both the strengths and the deficiencies of 
the system. F 


I should indicate that I have over 16 years of 
experience in software design, implementation, and manage- 
ment; my special interests are in interactive systems and 
user-interface design. 


Hardware 


Undoubtedly, many customers were first attracted to 
the TRS-80 by its low initial price. For $599, the system 
comes complete with a keyboard (which houses the Z-80 
processor and memory), a 12" black-and-white display, a 
cassette player/recorder, a small outboard power supply, 
assorted cables, and an excellent manual. All of the 
components are packaged in silver-and-black plastic cases, 
which look attractive and seem sturdy enough for normal use. 


The manual deserves special mention. Assuming no 
previous computer knowledge, it leads the reader into the 
System gradually, blending tutorial sections with numerous 
try-1t-and-see examples. Marginal notes give details for 
more experienced users, I feel that it is one of the 
finest introductions to computing that I've seen. 


The basic configuration includes 4K bytes of dynamic 
RAM and the "Level I" BASIC interpreter, which is stored 
on a 2K ROM. A 12K "Level II" ROM is available for an 
additional $99. The 16K memory option, which now includes 
a numeric keypad, costs $299. 


The keyboard conforms closely to the ASCII layout, and 
has a reasonably good feel. It should not offend experienced 
typists, although some may miss the audible feedback. Level 
I software does not support keyboard rollover, so it is 
ae to miss characters in rapid bursts (Level II corrects 
this). 


The display is divided into 16 lines of 64 character 
positions. Each character position is further divided into 
six smaller rectangles, making a 128 x 48 grid. The user 
may display text in any character position, or he may turn 
on, turn off, or interrogate the state of any of the smaller 
rectangles. Much to the dismay of many users, there is no 
provision for lower case, even though it is really "in there." 
(A one-chip modification is widely available from independent 
sources to enable the display of lower case, but this does 
not work well with Radio Shack's software.) 


The cassette recorder is designed for audio, not 
computer, usage. As a result, its operation is somewhat 
slow (250 baud in Level I, 500 baud in Level II) and 
cumbersome. The user must manually switch from RECORD 
(for writing) to PLAY (for reading). In Level I, he must 
also position the tape rather precisely. This requires 
pulling the control jack out of the recorder, then using 
the REWIND and FAST FORWARD controls as necessary, and 
finally, reinserting the control jack. The Level I system 
has no command to verify that a CSAVE command worked. Radio 
Shack advises users to dump important files more than once-- 
and hope that one of them is good! The only way to be sure 
a file is good is to reload it, which clobbers the system's 
contents. (Level II has a verification command.) 


Level I BASIC 


The Level I BASIC interpreter is so limited that I 
don't recommend it, even for people who only want it to 
play simple games. I suspect that it was developed strictly 
to keep the advertised price down and to bring the TRS-80 
to market a few months sooner, Now that Level II is here, 
I feel it is shameful to continue selling Level I systems. 


Although most BASICs are limited in variable names, 
Level I is worse than average. Only 26 identifiers (A 
through Z) are available for normal (floating point) 
variables. One array, A(i) is provided; this array 
requires no DIM statement, and is "sparse"--that is, unused 
elements take up no storage space. 


The string facilities are even worse. Only two 
strings, A$ and B$, are provided. Each can be assigned 
up to 16 characters, via either LET or INPUT statements. 
However, the only allowable operation on strings is to 
PRINT them. They cannot be indexed, concatenated, or even 


compared for equality against one another or against constants. 
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The floating point variables used in Level I appear to 
carry 24 significant bits internally. They,also seem to 
carry decimal exponents, in the range |-38, 38]. Although 
more digits are accepted on input, only 6 significant digits 
are printed on output. Thus, two numbers that differ 
internally are printed identically. 


Only the most elementary arithmetic operations are 
provided. Exponentiation, square root, logarithms, and 
trigonometric functions must be computed via subroutines. 


Since the system supports only a single, sequential 
device (the cassette), programs that wish to update files 
are limited to what can be contained in RAM. It is not 
possible to read a record, update it, and rewrite the result, 
then access the next record, etc. 


Level II BASIC 


Level II BASIC represents the “real” TRS-80. Written 
for Radio Shack by Microsoft, it seems to provide a good 
range of features, coupled with excellent reliability. its 
major enhancements include: 


ean unlimited number of one- or two-character names for 
arithmetic variables, strings, and arrays (longer names 
may be used, but only the first two characters are 
significant) ; 


estring lengths up to 255 characters, with provision 
for comparison, substringing, concatenation, etc. 


@integer and double-precision floating-point variables, 
in addition to single-precision floating point; 


@a complete set of functions, including one user-definable 
function; 


@a simple command to perform intra-statement editing; 
@the addition of ELSE constructs to IF...THEN statements; 
enamed cassette files, faster (500 baud) cassette 
transfer rate, and a command to verify the contents 
of a cassette file; 
e keyboard rollover, to keep up with fast typists; 


eautomatic prompting for line numbers during program 
input; 


e faster graphics; 
e commands to trace program execution; and 


eerror trapping, to help "seal off" programs from 
user errors. 


The Level II manual is clearly written, but it assumes 
familiarity with Level I. This makes it hard for new users 
to leap directly to Level II, because some of the Level I 
syntax is changed and because abbreviations are not accepted. 


It is difficult to use the manual for reference, since it 
lacks an index, 


Peripherals 


An impressive array of peripheral devices was announced 
almost immediately after the TRS-4’O was introduced. This 
convinced me that Radio Shack had done some serious system 
design before going to market, and was a major factor in my 
decision to buy the system. 


Most of the peripherals require use of an Expansion 
interface ($299), which includes a disk controller, a 
parallel printer interface, a second cassette interface, 

a real-time clock, and room to add up to 32K additional RAM 
($199 per 16K). The disk controller will support up to 
four mini-disk drives ($499 each). 


Two printers are currently supported. The Quick 
Printer ($499) prints at 150 lpm on 4.75" aluminum-finish 
paper. Although it provides some hardcopy capability, I 
don't consider it satisfactory for serious use~-not even for 
program listings--since the output is small and cannot be 
written on. The Line Printer ($1299 with friction feed 
or $1559 with tractor feed) is really a Centronics 779 with 
a silver cover. Like other peripherals, it can be purchased 
without Radio Shack's nameplate and paint job for considerably 
less--in this case, under $1000 for the tractor feed version. 
The print density is variable, from 10 to 16.5 characters 
per inch. At maximum density, it can print 132-character 
lines at 21 lpm. 


Using Disks 


The disk drive is simply a soft-sectored Shugart 
SA-400 with a power supply and case. Each drive provides 
about 86,000 bytes of usable storage. The first disk, 
however, must contain the Disk Operating System (DOS) and 
Disk BASIC, which are provided free. This software is 
updated periodically; the current version is 2.1. 


The presence of system software reduces the user 
storage on the first disk to about 55,000 bytes. During 
operation, these components occupy about 10K of RAM, so a 
16K system becomes somewhat cramped. This also results in 
conflicts with assembly language software, including virtually 
all of the programs that Radio Shack sells (including the 
program editor and assembler!). 
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The use of DOS introduces the concept of modes. At 
any point in time, the system may be operating in DOS, in 
BASIC, or in some other program. Exiting from BASIC to DOS 
destroys any programs and data that were being manipulated 
under BASIC, This can be extremely frustrating in light 
of the system's tendency to return to DOS whenever a disk 
error is detected. (Lost Data flags seem to arise from 
a wide variety of causes, and always at inopportune times.) 
Thus, an attempt to save a program can actually cause it 
to be lost. 


DOS includes commands to format disks, copy disks, 
list directories, set date and time, copy files, print files, 
and delete files. The file system incorporates a rather 
sophisticated, five-level protection scheme. DOS also 
includes a primitive, machine-language debugger, which only 
partially works as specified. 


Disk BASIC provides commands to enable and disable 
clock interrupts. Unfortunately, the interrupts must be 
disabled during cassette operations, and they must be 
enabled during certain (unspecified) disk operations. 
Failure to comply can result in anything from bad reads to 
destruction of the diskette's data. 


Evaluation 


On the whole, I feel that the TRS-80 deserves the 
success it enjoys. For under $2000, a user can purchase 
@ Level II system with the Expansion Interface, 32K of RAM, 
and a single disk. Except for the lack of lower-case, the 
hardware seems well designed and carefully matched. The 
recent announcements of new peripherals suggest that even 
better things are forthcoming. 


The system software is less consistent than the hard- 
ware. Although Level I BASIC is something of a joke, 
Level II is a sheer joy. At the present time, the sophist- 
icated features of DOS tend to be eclipsed by abominable 
error-handling procedures. I remain hopeful that this 
situation will improve as DOS matures. 


A limited amount of applications software is available 
from Radio Shack. This includes the renumbering program, 
the assembler and editor, an extensive financial package, 


a tutorial for Level II, and assorted games and demonstrations, 


all at rather reasonable prices. Some of the programs I've 
seen are rather good; others are downright amateurish. 
Unfortunately, there igs no way to judge a program (or even 
to find out exactly what it does) except by buying it. 


Other than the manuals for Level I and Level II, most 


of the documentation is poor, and often hard to get. DOS 
users are still operating from a preliminary manual for 
version 2.0 and an update for version 2.1. Both the real 


DOS manual and a reference manual that explains the hardware 
are supposed to be available, but I haven't found a store 
that has either one. 


I am frustrated by Radio Shack's unwillingness to 
distribute listings of the system software. Many users, if 
they had access to the listings, might fix bugs and develop 
useful extensions. Since users seem anxious to publish 
what they've accomplished, Radio Shack is missing out ona 
wealth of free software help. 


Although the TRS-80 is far from perfect, I haven't 
found anything I like better at near the price. With so 
many units in the field, and a large organization supporting 


the effort, I am confident that the system will continue 
to improve. 


oes Clark's years of expericnce include a 
period when he was the man in charge of the 
JOSS system at the RAND Corporation. He 
was featured in the 1965 film "JOSS," along 
with JOSS's inventor, J. Clifford Shaw. 

We believe that this is the first 

published review of the TRS-80 written 

by someone who 1s competent to compare 


it to other systens..| 
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HALLmarks 


In our issue number 72, Problem 256 was presented 
in the article "Solution Evolution--2," The problem was: 


Three variables, A, B, and C are to be progressively incremented 
with the mantissas of successive square roots. The initial 
values of the three variables are thus: 


A = .23606797749 (from the square root of 5) 
B = 41421356237 (from the square root of 2) 
C = .73205080756 (from the square root of 3) 


Each new mantissa (the next one is .44948974278) is to be added to 
the variable whose contents at that time is the smallest (thus, 
the mantissa of the square root of 6 is to be added to A). 


What we want at each stage is the variance of the contents of 
A, B, and C, and specifically we want to record successively lower 
values of the variances. 


A possible method of solution was given, together with the 
first nine occurrences of new lower variances. 


Bob Hall, Arleta, California, writes: 


"In my opinion, the most significant shortcoming of 
programmable calculators is their slow execution speed, and 
this problem is a good example of it. Time after time I 
have run into such cases, and no amount of programming 
finesse can help when a factor of 100 or more in speed is 
what is really needed. 


"With calculations only through N = 141,000, I would 
like to state a few conjectures about this problem, the 
truth (or falsity) of which may better be determined by 
those persons with access to faster machines. 


"The attainment of close agreement between the three 
numbers is really more likely with smaller differences 
between successive square roots, rather than with smaller 
fractional values for numbers slightly greater than perfect 
squares. 


(1) Therefore, new sets with reduced variance 
may occur with large as well as small fractional parts 
of the square root of N. 


"Since the differences are continuously decreasing, 
successive fractional parts become ever more nearly equal. 
Since adding nearly equal numbers to nearly equal numbers 
yields nearly equal numbers, it follows that: 
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(2) New sets with reduced variance are likely 
to occur in "triples" (i.e., N, N+3, Nt6, etc.), 


But the successive values of new lower variances appear 
to decrease faster than the successive differences. 


(3) Therefore, new sets with reduced variance 
will occur less and less frequently (i.e., at ever- 
increasingly greater differences between values of 
N at which they occur). 


(4) Thus it appears that such new sets in 
sequences (such as "triples") may never occur at all, 
since the problem always seeks lower variances 
within each such sequence. 


"Analysis of the outputs shows that the fractional 
parts are small and decreasing, but not minimal. This 
seems to disprove (1). I do not understand why. At the 
moment, I have insufficient data to verify (or refute) 

(2) and (4). (3) appears to be true. 


"The accumulated calculating time from N = 5 through 
N = 141,000 on my HP-29C was about 170 hours. This is an 
interesting problem, but my solution was not too satisfying 
due to the slow speed of execution. 


(At this point, Mr. Hall had accumulated the following 
results) 


N Variance N Variance 


.017680978 7587 .0014 302934 

18 071521011 9044 .0013824780 
29 .014508327 9428 .0010130340 
54 .012894753 12120 .0009927900 
86 .007127451 21927 .0009161700 
634 006227937 22524 .0007190370 
686 003234124 23740 .000678 3690 
738 003212868 33516 .0006501906 
1949 .0019104 37 43709 .0005844504 
3150 .001526976 44128 0004510290 
67113 .000 3671490 


91843 .0002547 379 
134727 0002264970 
139914 .0002121399 
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A later communication from Mr. Hail goes on: 


"My improved algorithm works very well and summarizes 
thus: 


The midsum value is not stored inasmuch as it 
is always reset to zero after each summation by 
appropriate adjustment of minsum and maxsum. This 
saves on sorting operations while simultaneously 
keeping magnitudes of minsum and maxsum low (ie, less 
than one), simplifies calculation of the variance, 
and reduces program statements required. 


For example, the given initial values are: 


MIN = mantissa of ¥5_ = 0,236... 
MID = mantissa of V2 = 0.414... 
MAX = mantissa of V3 = 0.732... 


The variance is the same if: 


MIN - MID— MIN (= 0.236 - 0.414 = -0.178) 
MID - MID— > MID (= 0.414 - 0.414 = 0) 
MAX - MID — MAX (= 0.732 - 0.414 = 0.318) 


and these are my new starting values. 
"In the running program, FRAC( VN ) + MIN— > MIN. 

Thus, the "MIN" may, in reality, be greater than zero, and, 
if greater than zero, it may also be greater than MAX, 
The following logic corrects this: 

MIN + FRAC( VN )—~> MIN 

IF MIN greater than zero, then 

If MIN > MAX, then 
MAX—> TEMP; MIN—> MAX; TEMP» MIN 
MAX - MIN—»MAX; O ~- MIN—~MIN 

(Exchange MAX and MIN; "Adjust" to make MID = 0) 


This "adjustment" of MIN and MAX is derived by 
"resetting" MID to 0, viz... 


If MIN O: means that MIN and MID have been 
exchanged by the summation. 


If MIN MAX: means that MID and MAX have also 
been exchanged. 


The algorithm given above, in reality, reverses these to 
make MIN< MID (=0)< MAX. 


"I programmed this algorithm on my HP-29C calculator 
and obtained the following results: 


N Variance 


142167 -00003345046 
157648 .-00002849966 
255070 00002617 399 
351697 .00002362866 


"Then, while attending the Sperry-Univac programming 
course in Minneapolis, I had the opportunity to accomplish 
the same logic in a PASCAL program which was then executed 
on a Univac II...reaching, in one run, N = 10,000,000. 

The largest result had N = 6,345,461 with a variance of 
.0O000040472. Several of the results achieved earlier 
on the hand calculator were skipped by the PASCAL program; 
I do not know why." 


Mr. Hall notes that the ratio of computer speed to 
calculator speed is of the order of 16000 to 1. With 
regard to his conjectures, he concludes that (1) and (2) 
are false and (3) and (4) are true. Finally, he suggests 
that the boxed quotation we ran at the beginning of the 
original article be changed to be: 


After a program is written, 
debugged, thoroughly tested, 


then do we know just how it 
should have been written. 
--Bob Hall's version 
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.» Of Not To Recurse 


Picture an endless stream of numbers: 
A B Cc D E F G H Ae 45 


For each set of three consecutive numbers, we form the 
new numbers: 


Bt+C E+ F H+ 1 
A D G 


in other words, for each set of three numbers, divide the 
first of them into the sum of the other two. 


This gives a new endless series of numbers, and the 
game process is to be applied to that set to produce a new 
set, to which the same process is applied, and so on. 


If the first set is the natural numbers, then the 
whole process is rather dull and predictable--every term 
at every level tends toward 2.00 rather quickly. We can 
patch that deficiency later, but for now let's consider 
how the various sets could be calculated. 


At each level, when three numbers have accumulated, 
then one number at the next lower level can be calculated. 
Thus, for any given level, a subroutine could be written 
to do the following... 


Set up four buckets, P, Q, R, and C, all initially 
set to zero. When this subroutine is called, there will 
be a result available from the next higher subroutine. 

This result is to be put into P, Q, or R, whichever is 
currently zero. Bucket C is a counter, and it is now 
incremented by one. 


If C is less than 3, control returns to the main 
program. if C = 3, then the basic calculation is performed: 


QtRk 


XX = P > 


P, Q, R, and C are reset to zero, and the subroutine at the 
next lower level is called to receive the new result. 


Te number of such subroutines to be written depends 
on the depth to which the calculation is desired. If 
the first set of calculated values is called level zero, 
each new entry at that level will be obtained when three 
elements of the original generating set of numbers is 
used. Succeeding levels, then, will add an element as 
follows: 


level 1 for each 9 of the original set 


MS OVI Fw 
~j 
ae) 
\O 


6561 and so on... 


Thus, to find the first dozen elements at level 10, 
calculations at level zero will have to be made through 
2,125,764 elements of the generating set. 


To go to level 10, then, would call for writing 
eleven subroutines--and they would be identical in their 
form; that is, each of them would have precisely the same 
instructions. The only difference between them would 
be that each of them would have its own set of buckets 
P, Q, R, and C, 


In other words, the situation seems to call for one 
subroutine, called recursively. 


At this point, perhaps we should refer again to 
the ae of Forman Acton (in Numerical Methods That 
work): 


"...4t 4s probably time to commit a public heresy by denouncing 
recursive calculations. I have never seen a numerical problem 
arising from the physical world that was best calculated by a 
recursive subroutine--that is, by a subroutine that called itself. 
I admit the idea 1s cute and, once mastered, it tends to impel 

its owner to apply it wherever possible--all questions of 
appropriateness aside." 


Consider also the article "Recursive Programming in 
See by Herbert Tei. (in the April 1979 issue of 
ersonal Computi » in which a 15-line program is given 
that will demonstrate, on any system that supports BASIC, 
the extent to which one can use recursive subroutining. 
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1050 RETURN 


2000 END 


A program written in Applesoft BASIC to implement the problem 


described in the text. 
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This problem was eventually coded in BASIC without 
using subroutines at all. The code is given here (the 
subroutine at 1000 is used simply to avoid repetitive 
address modification). The accompanying chart shows the 
first twelve elements for the first 8 levels. To make 
the calculation less dull (statements 300 and 500), the 
current level number is added to the numerator of the 
fractions. Within the limits of the computer run 
represented by the chart, the even numbered leveB decrease 
and the odd numbered levels increase, which is interesting 
and puzzling. 


The objective here was to experiment with recursion, 
even though the end result did not need it. 


The final process is not unduly complex and is well 
defined, at least via the BASIC program. It would be 
difficult to produce the results shown without a computer 
and it would probably be impossible to produce any results 
at ali for level 25 without extensive use of a fast machine. 


Challenge Problem No. 6 


The following numbers: 


and 960 


88 90 


139 204 542 691 696 772 954 


What is it? 


have something in common. 


Similarly, the following list of numbers have a 


common element: 


91 220 254 329 336 370 468 499 607 747 902. 


